home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gold Medal Software 1
/
Gold Medal Software Volume 1 (Gold Medal) (1994).iso
/
misc
/
relate.arj
/
FIRST.BAT
< prev
next >
Wrap
DOS Batch File
|
1993-11-30
|
5KB
|
184 lines
ECHO OFF
BATCHMAN CLS
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Ch, To print out ALL documentation files:
BATCHMAN CECHO 0Eh, 1) Turn your printer on.
BATCHMAN CECHO 0Eh, 2) Type "A:" or "B:", followed by ENTER.
BATCHMAN CECHO 0Eh, 3) Put RELATE disk in that drive.
BATCHMAN CECHO 0Eh, 4) Type "DOCS", followed by ENTER.
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Bh, Please read the following documents:
BATCHMAN CECHO 0Eh, OPTIONS.DOC (program options that are available in the commercial version)
BATCHMAN CECHO 0Eh, ORDER.DOC (how to order the full-featured commercial version)
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO C 0Ah, You have this much free memory (RAM) =
BATCHMAN MAINMEM R
BATCHMAN CECHO 0Ah, You need about 216,800 free bytes of memory to run RELATE.EXE.
BATCHMAN CECHO 0Eh,
PAUSE
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Do you have a hard disk (press Y or N)?
BATCHMAN GETKEY 'YN'
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 2 GOTO FINI
:Q1
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Do you want me to transfer all RELATE files to your hard disk (press Y or N)?
BATCHMAN GETKEY 'YN'
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 2 GOTO FINI
:Q2
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Please enter 'C' or 'D' for the hard drive you want me to transfer all files
BATCHMAN CECHO 0Eh, to (I will make a directory for you on that drive called RELATE).
BATCHMAN CECHO 0Ch, If this is not O.K., then press 'X'.
BATCHMAN GETKEY 'CDX'
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 3 GOTO FINI
IF ERRORLEVEL == 2 GOTO DDRIVE
:CDRIVE
BATCHMAN DRIVEEXIST C:
IF ERRORLEVEL == 1 GOTO DCOK
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, You have no drive C.
GOTO Q2
:DCOK
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Tell me what drive your RELATE disk is in - Type 'A' or 'B'.
BATCHMAN GETKEY 'AB'
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 2 GOTO CFROMB
:CFROMA
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Wait a moment while I check your free disk space.
BATCHMAN CANCOPY A:\*.* C:
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 1 GOTO NROOMC
GOTO OKCA
:NROOMC
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Ch, You do not have enough room on drive C
GOTO Q1
:CFROMB
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Wait a moment while I check your free disk space.
BATCHMAN CANCOPY B:\*.* C:
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 1 GOTO NROOMC
GOTO OKCB
:OKCA
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, I will now make the directory and transfer the files.
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Here are the files I am transfering from drive A to drive C.
BATCHMAN CECHO 0Eh,
C:
MD \RELATE
COPY A:\*.* C:\RELATE
copy c:\RELATE\RELC.bat c:\
A:
GOTO LBL1
:OKCB
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, I will now make the directory and transfer the files.
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Here are the files I am transfering from drive B to drive C.
BATCHMAN CECHO 0Eh,
C:
MD \RELATE
COPY B:\*.* C:\RELATE
copy c:\RELATE\RELC.bat c:\
B:
GOTO LBL1
:DDRIVE
BATCHMAN DRIVEEXIST D:
IF ERRORLEVEL == 1 GOTO DDOK
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, You have no drive D.
GOTO Q2
:DDOK
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Tell me what drive your RELATE disk is in - Type 'A' or 'B'.
BATCHMAN GETKEY 'AB'
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 2 GOTO DFROMB
:DFROMA
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Wait a moment while I check your free disk space.
BATCHMAN CANCOPY A:\*.* D:
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 1 GOTO NROOMD
GOTO OKDA
:NROOMD
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Ch, You do not have enough room on drive D
GOTO Q1
:DFROMB
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Wait a moment while I check your free disk space.
BATCHMAN CANCOPY B:\*.* D:
IF ERRORLEVEL == 255 GOTO FINI
IF ERRORLEVEL == 1 GOTO NROOMD
GOTO OKDB
:OKDA
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, I will now make the directory and transfer the files.
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Here are the files I am transfering from drive A to drive D.
BATCHMAN CECHO 0Eh,
D:
MD \RELATE
COPY A:\*.* D:\RELATE
copy d:\RELATE\RELC.bat d:\
A:
GOTO LBL1
:OKDB
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, I will now make the directory and transfer the files.
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Here are the files I am transfering from drive B to drive D.
BATCHMAN CECHO 0Eh,
D:
MD \RELATE
COPY B:\*.* D:\RELATE
copy d:\RELATE\RELC.bat d:\
B:
GOTO LBL1
:LBL1
:FINI
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Ch, TO RUN RELATE:
BATCHMAN CECHO 0Fh, 1) Read down the first column to find the drive you will start RELATE from.
BATCHMAN CECHO 0Fh, 2) Read across for the command to use to start RELATE.
BATCHMAN CECHO 0Fh, 4) Type the command followed by ENTER to start RELATE.
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh, Disk drive A RELA
BATCHMAN CECHO 0Eh, Disk drive B RELB
BATCHMAN CECHO 0Eh, Disk drive C RELC
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Ah, You're on your own now - Please read ALL the documentation.
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh,
BATCHMAN CECHO 0Eh,
EXIT